(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 8.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       157,          7]
NotebookDataLength[     32686,        709]
NotebookOptionsPosition[     31361,        667]
NotebookOutlinePosition[     31706,        682]
CellTagsIndexPosition[     31663,        679]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[TextData[{
 StyleBox["MotorGear\n",
  FontFamily->"System"],
 StyleBox["Electric motor with gear and inertia load",
  FontSize->16]
}], "Section",
 Evaluatable->False,
 CellChangeTimes->{
  3.522604736109375*^9, 3.52260476665625*^9, {3.5719274419221463`*^9, 
   3.571927442109347*^9}, 3.5934148169224095`*^9}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"domain", "=", "\"\<Electric\>\""}], ";"}], "\n", 
 RowBox[{
  RowBox[{"displayName", "=", "\"\<MotorGear\>\""}], ";"}], "\n", 
 RowBox[{
  RowBox[{"brief", "=", "\"\<Electric motor with gear and inertia load\>\""}],
   ";"}], "\n", 
 RowBox[{
  RowBox[{"componentType", "=", "\"\<ComponentQ\>\""}], ";"}], "\n", 
 RowBox[{
  RowBox[{"author", "=", "\"\<Petter Krus <petter.krus@liu.se>\>\""}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
  "affiliation", " ", "=", " ", 
   "\"\<Division of Fluid and Mechatronic Systems, Link\[ODoubleDot]ping \
University\>\""}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetFilenames", "[", 
   RowBox[{"defaultPath", ",", "domain", ",", "displayName"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ResetComponentVariables", "[", "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Date", "[", "]"}]}], "Input",
 CellChangeTimes->{{3.503905077842648*^9, 3.503905079842648*^9}, {
   3.5039103076641607`*^9, 3.5039103985397425`*^9}, {3.5039164662834997`*^9, 
   3.5039164750178747`*^9}, {3.5039165143772497`*^9, 
   3.5039165189397497`*^9}, {3.5041051675625*^9, 3.504105226359375*^9}, {
   3.507570546125*^9, 3.507570569546875*^9}, {3.507570601046875*^9, 
   3.50757067696875*^9}, 3.507796401609375*^9, {3.507887022343302*^9, 
   3.507887057967846*^9}, {3.5078871702320337`*^9, 3.507887175028847*^9}, {
   3.5082235454098396`*^9, 3.5082235597692146`*^9}, 3.5082237305660896`*^9, {
   3.512921352515625*^9, 3.512921388578125*^9}, {3.513708407234375*^9, 
   3.51370842740625*^9}, 3.513708469203125*^9, {3.5137087323125*^9, 
   3.513708733765625*^9}, {3.513708789984375*^9, 3.5137088199375*^9}, {
   3.513709315953125*^9, 3.5137093166875*^9}, {3.51370934803125*^9, 
   3.513709386875*^9}, 3.515393228397682*^9, 3.515394538846967*^9, {
   3.521777776703125*^9, 3.521777777328125*^9}, 3.575772938897264*^9, 
   3.5757731204702187`*^9, 3.605856610511998*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"nodeConnections", "=", 
   RowBox[{"{", "\[IndentingNewLine]", "\t", 
    RowBox[{
     RowBox[{"ElectricQnode", "[", 
      RowBox[{"el1", ",", "0.", ",", "\"\<port 1\>\""}], "]"}], ",", 
     "\[IndentingNewLine]", "\t", 
     RowBox[{"ElectricQnode", "[", 
      RowBox[{"el2", ",", "0.", ",", "\"\<port 2\>\""}], "]"}], ",", 
     "\[IndentingNewLine]", "\t", 
     RowBox[{"MechanicRotQnode", "[", 
      RowBox[{
      "mr1", ",", "0.", ",", "0.", ",", "\"\<Mechanical rot.connection\>\""}],
       "]"}]}], "\[IndentingNewLine]", "}"}]}], ";"}]], "Input",
 CellChangeTimes->{
  3.51371110959375*^9, {3.515486897105438*^9, 3.5154868972460594`*^9}, {
   3.5154963499562235`*^9, 3.5154963505968523`*^9}, {3.515525281796875*^9, 
   3.515525324359375*^9}, {3.515560997171875*^9, 3.51556103534375*^9}, {
   3.515685350796875*^9, 3.51568536184375*^9}, {3.515685595984375*^9, 
   3.515685598703125*^9}, {3.51572598011862*^9, 3.5157259948825703`*^9}, 
   3.51862799871875*^9, {3.521778232359375*^9, 3.521778233796875*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"inputParameters", "=", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
      "Ke", ",", "0.13", ",", "double", ",", "\"\<V/rpm\>\"", ",", 
       "\"\<emf constant\>\""}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "Ra", ",", "0.04", ",", "double", ",", "\"\<Ohm\>\"", ",", 
       "\"\<motor resistance\>\""}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "Tm0", ",", "0.", ",", "double", ",", "\"\<Nm\>\"", ",", 
       "\"\<zero speed friction of motor\>\""}], "}"}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "wc", ",", "1.", ",", "double", ",", "\"\<rad/s\>\"", ",", 
       "\"\<Friction speed (for numerics)\>\""}], "}"}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "Bm", ",", "0.0012", ",", "double", ",", "\"\<Nms/rad\>\"", ",", 
       "\"\<Visc. fric. coeff., motor\>\""}], "}"}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "Jm", ",", ".1", ",", "double", ",", "\"\<kg m^2\>\"", ",", 
       "\"\<Moment of inertia, motor\>\""}], "}"}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "BL", ",", "0.0", ",", "double", ",", "\"\<Ns/m\>\"", ",", 
       "\"\<Visc. fric. coeff., motor\>\""}], "}"}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "JL", ",", "1", ",", "double", ",", "\"\<kg m^2\>\"", ",", 
       "\"\<Moment of inertia, motor\>\""}], "}"}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "myfric", ",", ".01", ",", "double", ",", "\"\<\>\"", ",", 
       "\"\<friction. coeff. of gear (at output)\>\""}], "}"}]}], 
    "\[IndentingNewLine]", "}"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.51370929940625*^9, 3.51370929940625*^9}, {
   3.513709582640625*^9, 3.513709583484375*^9}, {3.513939656771557*^9, 
   3.513939661740243*^9}, {3.515524764375*^9, 3.515524840125*^9}, {
   3.515727322344883*^9, 3.5157273865459538`*^9}, 3.518260862875*^9, 
   3.518261225265625*^9, 3.519040872671875*^9, 3.519040945984375*^9, 
   3.51906377815625*^9, {3.51911507559375*^9, 3.519115108265625*^9}, {
   3.519115167890625*^9, 3.51911521371875*^9}, {3.51911576046875*^9, 
   3.519115764109375*^9}, {3.519118910390625*^9, 3.519118922671875*^9}, {
   3.5191190169375*^9, 3.5191191019375*^9}, {3.519192115375*^9, 
   3.5191921193125*^9}, {3.5375240011945553`*^9, 3.53752410979698*^9}, {
   3.537524303775069*^9, 3.537524310884262*^9}, {3.575774247806856*^9, 
   3.5757742483996572`*^9}, {3.5757743357692604`*^9, 
   3.5757743368612623`*^9}, {3.5757744285638833`*^9, 3.575774442635108*^9}, 
   3.6648565533374557`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"inputVariables", " ", "=", " ", 
   RowBox[{"{", "\n", "   ", 
    RowBox[{"{", 
     RowBox[{
     "gearRatio", ",", " ", "1.", ",", " ", "double", ",", " ", "\"\<\>\"", 
      ",", " ", "\"\<gearing w1/w2\>\""}], "}"}], "\n", "   ", "}"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.51879550009375*^9, 3.51879554940625*^9}, 
   3.519063771984375*^9, 3.519064900515625*^9, 3.5757741287903643`*^9, 
   3.5757742530484657`*^9, {3.5757743310892525`*^9, 3.5757743310892525`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"outputVariables", "=", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
      "wm", ",", "0.", ",", "double", ",", "\"\<rad/s\>\"", ",", 
       "\"\<motor speed\>\""}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "tormg", ",", "0.", ",", "double", ",", "\"\<Nm\>\"", ",", 
       "\"\<Generated motor torque\>\""}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "Pin", ",", "0.", ",", "double", ",", "\"\<W\>\"", ",", 
       "\"\<Input power\>\""}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "Pout", ",", "0.", ",", "double", ",", "\"\<W\>\"", ",", 
       "\"\<Output power\>\""}], "}"}]}], "\[IndentingNewLine]", "}"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.518547082234375*^9, 3.5185471520625*^9}, 
   3.518547487640625*^9, {3.518628009390625*^9, 3.518628013953125*^9}, {
   3.51904117421875*^9, 3.5190412405625*^9}, {3.519105757*^9, 
   3.51910577603125*^9}, {3.51910591740625*^9, 3.519105935296875*^9}, {
   3.5853053488252273`*^9, 3.585305350061298*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"wme", "=", 
   RowBox[{"gearRatio", " ", "wmr1"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Tm0e", "=", " ", 
   RowBox[{"Tm0", " ", 
    RowBox[{"limit", "[", " ", 
     RowBox[{
      RowBox[{"wmr1", "/", " ", "wc"}], ",", 
      RowBox[{"-", "1."}], ",", "1."}], "]"}]}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tormge", "=", 
   RowBox[{
    RowBox[{"Ke", " ", "iel2"}], "-", 
    RowBox[{"Bm", " ", "wme"}], "-", "Tm0e"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tore", "=", 
   RowBox[{"gearRatio", " ", "tormge"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.515560667421875*^9, 3.5155606675*^9}, {
   3.515560725140625*^9, 3.515560785453125*^9}, {3.5155609716875*^9, 
   3.515560972265625*^9}, 3.518260873453125*^9, 3.51904099365625*^9, {
   3.519041154953125*^9, 3.51904115653125*^9}, {3.51910365884375*^9, 
   3.519103674109375*^9}, 3.5191037251875*^9, {3.51911567465625*^9, 
   3.519115708015625*^9}, 3.5371673845764513`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Tfr", "=", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"myfric", " ", 
      RowBox[{"Abs", "[", "tormr1", "]"}]}], ")"}], " ", 
    RowBox[{"limit", "[", " ", 
     RowBox[{
      RowBox[{"wmr1", "/", " ", "wc"}], ",", 
      RowBox[{"-", "1."}], ",", "1."}], "]"}]}]}], ";"}]], "Input",
 CellChangeTimes->{
  3.51911504184375*^9, {3.51911515415625*^9, 3.51911516159375*^9}, {
   3.51911523025*^9, 3.519115245296875*^9}, 3.519115521796875*^9, {
   3.51911561315625*^9, 3.519115638296875*^9}, 3.519115712546875*^9, 
   3.51911581653125*^9, {3.5371673679045763`*^9, 3.5371673845920763`*^9}, {
   3.5375239481042037`*^9, 3.5375239553224916`*^9}, {3.537524146169729*^9, 
   3.537524160747481*^9}, {3.537524286994249*^9, 3.5375242912128906`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"systemEquationsDA", ":=", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           SuperscriptBox["gearRatio", "2"], "Jm"}], "+", "JL"}], ")"}], " ", 
        RowBox[{"Der", "[", "wmr1", " ", "]"}]}], "+", " ", "Tfr", "+", 
       RowBox[{"BL", " ", "wmr1"}]}], "==", 
      RowBox[{"(", 
       RowBox[{"tore", "-", "tormr1"}], ")"}]}], ",", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"Der", "[", "thetamr1", "]"}], "==", "wmr1"}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"uel1", "-", "uel2"}], ")"}], "==", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"Ra", " ", "iel2"}], " ", "+", " ", 
        RowBox[{"Ke", " ", "wme"}]}], ")"}]}]}], "\[IndentingNewLine]", "\t", 
    "}"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.5137095851875*^9, 3.513709592578125*^9}, {
   3.513711114796875*^9, 3.51371111625*^9}, {3.5155248569375*^9, 
   3.515524880078125*^9}, {3.515524973140625*^9, 3.515524989140625*^9}, {
   3.51552505634375*^9, 3.515525088140625*^9}, {3.515560561484375*^9, 
   3.51556057584375*^9}, 3.515560757375*^9, 3.515560881015625*^9, {
   3.515561183375*^9, 3.515561184140625*^9}, {3.51556127203125*^9, 
   3.5155612795*^9}, {3.5157263492789683`*^9, 3.5157263555012937`*^9}, {
   3.5157297162142982`*^9, 3.5157297444174232`*^9}, {3.518260864515625*^9, 
   3.5182608670625*^9}, {3.518260976875*^9, 3.518261012625*^9}, {
   3.518261087015625*^9, 3.51826110178125*^9}, {3.5182612159375*^9, 
   3.51826127765625*^9}, {3.51826132946875*^9, 3.518261351578125*^9}, {
   3.519040873453125*^9, 3.51904087634375*^9}, {3.51904094640625*^9, 
   3.519040947421875*^9}, 3.5190409941875*^9, 3.51904114153125*^9, {
   3.519041298375*^9, 3.519041305921875*^9}, 3.519103681765625*^9, {
   3.51910372815625*^9, 3.5191037285625*^9}, {3.51911514003125*^9, 
   3.519115140890625*^9}, 3.51911524771875*^9, 3.5371673845920763`*^9, {
   3.571927475462205*^9, 3.5719274938234377`*^9}, 3.575773739558757*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"systemBoundaryEquations", "=", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"uel1", "==", 
      RowBox[{"cel1", "-", 
       RowBox[{"Zcel1", " ", "iel2"}]}]}], ",", "\[IndentingNewLine]", 
     RowBox[{"uel2", "==", 
      RowBox[{"cel2", "+", 
       RowBox[{"Zcel2", " ", "iel2"}]}]}], ",", "\[IndentingNewLine]", 
     RowBox[{"tormr1", "==", " ", 
      RowBox[{"cmr1", " ", "+", " ", 
       RowBox[{"Zcmr1", " ", "wmr1"}]}]}]}], "\[IndentingNewLine]", "}"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.513709484578125*^9, 3.513709484578125*^9}, {
  3.515490149741*^9, 3.515490151006625*^9}, {3.51556122921875*^9, 
  3.51556123359375*^9}, {3.515561274515625*^9, 3.515561294265625*^9}, {
  3.5157263110717087`*^9, 3.515726324467642*^9}, {3.5157298428080482`*^9, 
  3.5157298429017982`*^9}, {3.5158131639265437`*^9, 3.515813165879506*^9}, {
  3.5160312933125*^9, 3.516031294484375*^9}, {3.5719274968186426`*^9, 
  3.571927513541872*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"systemVariables", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{
    "wmr1", ",", "thetamr1", ",", "iel2", ",", "uel1", ",", "uel2", ",", 
     "tormr1"}], "}"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.51370899921875*^9, 3.5137090601875*^9}, {
   3.513709135484375*^9, 3.513709184734375*^9}, 3.515486918636137*^9, {
   3.515493296482911*^9, 3.515493296842286*^9}, {3.515493662074348*^9, 
   3.5154936675586176`*^9}, 3.515493810883874*^9, {3.515561127234375*^9, 
   3.515561128046875*^9}, {3.5157277872105813`*^9, 3.515727788163694*^9}, {
   3.5157297108861732`*^9, 3.5157297109799232`*^9}, 3.519041445078125*^9, {
   3.51910373490625*^9, 3.51910373909375*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"Pin", "=."}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Pout", "=."}], ";"}]}], "Input",
 CellChangeTimes->{{3.51910586278125*^9, 3.519105869328125*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"expressions", " ", "=", " ", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"wm", "==", 
      RowBox[{"gearRatio", " ", "wmr1"}]}], ",", "\[IndentingNewLine]", 
     RowBox[{"iel1", "==", " ", 
      RowBox[{"-", "iel2"}]}], ",", " ", "\[IndentingNewLine]", 
     RowBox[{"tormg", "==", " ", "tormge"}], ",", "\[IndentingNewLine]", 
     RowBox[{"Pin", "==", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"uel1", "-", "uel2"}], ")"}], " ", "iel2"}]}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"Pout", "==", 
      RowBox[{"wmr1", " ", "tormr1"}]}]}], "\[IndentingNewLine]", "}"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.515525016296875*^9, 3.515525028234375*^9}, {
   3.5155612083125*^9, 3.51556121028125*^9}, 3.5157297806361732`*^9, {
   3.5190410831875*^9, 3.519041083203125*^9}, {3.519041163625*^9, 
   3.51904116503125*^9}, {3.519041372109375*^9, 3.51904139265625*^9}, {
   3.5191036971875*^9, 3.519103708921875*^9}, {3.519105819578125*^9, 
   3.519105904671875*^9}, {3.571927524883092*^9, 3.5719275479243326`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Compgen", "[", "file", "]"}]], "Input"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Part", "::", "partd"}], "MessageName"], ":", 
  " ", "\<\"Part specification \[NoBreak]\\!\\(delayedPart \
\[LeftDoubleBracket] \\(\\(1, 1\\)\\) \[RightDoubleBracket]\\)\[NoBreak] is \
longer than depth of object. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/partd\\\", ButtonNote -> \
\\\"Part::partd\\\"]\\)\"\>"}]], "Message", "MSG",
 GeneratedCell->False,
 CellAutoOverwrite->False,
 CellChangeTimes->{
  3.575773036769436*^9, 3.575773139445051*^9, 3.575773170489106*^9, 
   3.5757732449016576`*^9, 3.575773377604718*^9, 3.5757734366594343`*^9, {
   3.575773605788634*^9, 3.575773630650689*^9}, 3.575773963684351*^9, 
   3.575774148259198*^9, 3.5757741839447327`*^9, {3.575774256964072*^9, 
   3.5757742709503098`*^9}, 3.575774303004379*^9, 3.5757743830685434`*^9, 
   3.575774457299134*^9, 3.575774531727563*^9, 3.575774595088379*^9, 
   3.5757746355182657`*^9, 3.5757747238772607`*^9, 3.575779425098704*^9, 
   3.5757859676247234`*^9, 3.575786453579839*^9, 3.575786853082011*^9, 
   3.5758175867818193`*^9, 3.578816691992367*^9, 3.581406009825386*^9, 
   3.581406160646013*^9, 3.5814062938836336`*^9, 3.6031910264893637`*^9, 
   3.6058566001139584`*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Part", "::", "partd"}], "MessageName"], ":", 
  " ", "\<\"Part specification \[NoBreak]\\!\\(delayedPart \
\[LeftDoubleBracket] \\(\\(2, 1\\)\\) \[RightDoubleBracket]\\)\[NoBreak] is \
longer than depth of object. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/partd\\\", ButtonNote -> \
\\\"Part::partd\\\"]\\)\"\>"}]], "Message", "MSG",
 GeneratedCell->False,
 CellAutoOverwrite->False,
 CellChangeTimes->{
  3.575773036769436*^9, 3.575773139445051*^9, 3.575773170489106*^9, 
   3.5757732449016576`*^9, 3.575773377604718*^9, 3.5757734366594343`*^9, {
   3.575773605788634*^9, 3.575773630650689*^9}, 3.575773963684351*^9, 
   3.575774148259198*^9, 3.5757741839447327`*^9, {3.575774256964072*^9, 
   3.5757742709503098`*^9}, 3.575774303004379*^9, 3.5757743830685434`*^9, 
   3.575774457299134*^9, 3.575774531727563*^9, 3.575774595088379*^9, 
   3.5757746355182657`*^9, 3.5757747238772607`*^9, 3.575779425098704*^9, 
   3.5757859676247234`*^9, 3.575786453579839*^9, 3.575786853082011*^9, 
   3.5758175867818193`*^9, 3.578816691992367*^9, 3.581406009825386*^9, 
   3.581406160646013*^9, 3.5814062938836336`*^9, 3.603191026494364*^9, 
   3.6058566001149583`*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"XMLElement", "::", "cntsList"}], "MessageName"], ":", 
  " ", "\<\"\[NoBreak]\\!\\(XMLElement[\\(\\(\\\"modelobject\\\", \
\\(\\({\\(\\(\\\"typename\\\" \[Rule] \\\"ElectricMotorGear\\\"\\)\\), \\(\\(\
\[LeftSkeleton] 1 \[RightSkeleton]\\)\\)}\\)\\), \
\\(\\({\\(\\(XMLElement[\\(\\(\\\"icon\\\", \\(\\({\\(\\(\\\"isopath\\\" \
\[Rule] \\\"ElectricMotorGear.svg\\\"\\)\\), \\(\\(\\\"iconrotation\\\" \
\[Rule] \\\"ON\\\"\\)\\), \\(\\(\\\"userpath\\\" \[Rule] \
\\\"ElectricMotorGear.svg\\\"\\)\\)}\\)\\), \\(\\({}\\)\\)\\)\\)]\\)\\), \
\\(\\(XMLElement[\\(\\(\\\"portpositions\\\", \\(\\({}\\)\\), \
\\(\\({\\(\\(XMLElement[\\(\\(\\\"portpose\\\", \\(\\({\\(\\(\\\"x\\\" \
\[Rule] \\\"0\\\"\\)\\), \\(\\(\\\"y\\\" \[Rule] 0.25`\\)\\), \\(\\(\\\"a\\\" \
\[Rule] \\\"0\\\"\\)\\), \\(\\(\\\"name\\\" \[Rule] \
\\\"Pel1\\\"\\)\\)}\\)\\), \\(\\({}\\)\\)\\)\\)]\\)\\), \\(\\(\[LeftSkeleton] \
6 \[RightSkeleton]\\)\\), \\(\\(XMLElement[\\(\\(\\\"portpose\\\", \\(\\({\\(\
\\(\\\"x\\\" \[Rule] \\\"0.8\\\"\\)\\), \\(\\(\\\"y\\\" \[Rule] \
\\\"1\\\"\\)\\), \\(\\(\\\"a\\\" \[Rule] \\\"90\\\"\\)\\), \\(\\(\\\"name\\\" \
\[Rule] \\\"Pout\\\"\\)\\)}\\)\\), \
\\(\\({}\\)\\)\\)\\)]\\)\\)}\\)\\)\\)\\)]\\)\\)}\\)\\)\\)\\)]\\)\[NoBreak] in \
\[NoBreak]\\!\\(XMLElement[\\(\\(\\\"hopsanobjectappearance\\\", \
\\(\\({\\\"version\\\" \[Rule] \\\"0.1\\\"}\\)\\), \
\\(\\(XMLElement[\\(\\(\\\"modelobject\\\", \\(\\({\\(\\(\\\"typename\\\" \
\[Rule] \\\"ElectricMotorGear\\\"\\)\\), \\(\\(\\\"displayname\\\" \[Rule] \\\
\"ElectricMotorGear\\\"\\)\\)}\\)\\), \
\\(\\({\\(\\(XMLElement[\\(\\(\\\"icon\\\", \\(\\({\\(\\(\\\"isopath\\\" \
\[Rule] \\\"ElectricMotorGear.svg\\\"\\)\\), \\(\\(\\\"iconrotation\\\" \
\[Rule] \\\"ON\\\"\\)\\), \\(\\(\\\"userpath\\\" \[Rule] \
\\\"ElectricMotorGear.svg\\\"\\)\\)}\\)\\), \\(\\({}\\)\\)\\)\\)]\\)\\), \
\\(\\(\[LeftSkeleton] 1 \[RightSkeleton]\\)\\)}\\)\\)\\)\\)]\\)\\)\\)\\)]\\)\
\[NoBreak] is not a list of contents. The third item in an XMLElement must be \
a list of contents, even if it is an empty list. \\!\\(\\*ButtonBox[\\\"\
\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/XMLElement\\\", ButtonNote -> \
\\\"XMLElement::cntsList\\\"]\\)\"\>"}]], "Message", "MSG",
 GeneratedCell->False,
 CellAutoOverwrite->False,
 CellChangeTimes->{
  3.575773036769436*^9, 3.575773139445051*^9, 3.575773170489106*^9, 
   3.5757732449016576`*^9, 3.575773377604718*^9, 3.5757734366594343`*^9, {
   3.575773605788634*^9, 3.575773630650689*^9}, 3.575773963684351*^9, 
   3.575774148259198*^9, 3.5757741839447327`*^9, {3.575774256964072*^9, 
   3.5757742709503098`*^9}, 3.575774303004379*^9, 3.5757743830685434`*^9, 
   3.575774457299134*^9, 3.575774531727563*^9, 3.575774595088379*^9, 
   3.5757746355182657`*^9, 3.5757747238772607`*^9, 3.575779425098704*^9, 
   3.5757859676247234`*^9, 3.575786453579839*^9, 3.575786853082011*^9, 
   3.5758175867818193`*^9, 3.578816691992367*^9, 3.581406009825386*^9, 
   3.581406160646013*^9, 3.5814062938836336`*^9, 3.6031910265043635`*^9, 
   3.605856600115958*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Export", "::", "autofix"}], "MessageName"], ":", 
  " ", "\<\"Malformed symbolic XML expression encountered. This may result in \
unexpected XML data. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/Export\\\", ButtonNote -> \\\"Export::autofix\\\"]\
\\)\"\>"}]], "Message", "MSG",
 GeneratedCell->False,
 CellAutoOverwrite->False,
 CellChangeTimes->{
  3.575773036769436*^9, 3.575773139445051*^9, 3.575773170489106*^9, 
   3.5757732449016576`*^9, 3.575773377604718*^9, 3.5757734366594343`*^9, {
   3.575773605788634*^9, 3.575773630650689*^9}, 3.575773963684351*^9, 
   3.575774148259198*^9, 3.5757741839447327`*^9, {3.575774256964072*^9, 
   3.5757742709503098`*^9}, 3.575774303004379*^9, 3.5757743830685434`*^9, 
   3.575774457299134*^9, 3.575774531727563*^9, 3.575774595088379*^9, 
   3.5757746355182657`*^9, 3.5757747238772607`*^9, 3.575779425098704*^9, 
   3.5757859676247234`*^9, 3.575786453579839*^9, 3.575786853082011*^9, 
   3.5758175867818193`*^9, 3.578816691992367*^9, 3.581406009825386*^9, 
   3.581406160646013*^9, 3.5814062938836336`*^9, 3.6031910265043635`*^9, 
   3.6058566001169586`*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"XMLElement", "::", "attrhs"}], "MessageName"], ":", 
  " ", "\<\"\[NoBreak]\\!\\(0.25`\\)\[NoBreak] in \[NoBreak]\\!\\(\\\"y\\\" \
\[Rule] 0.25`\\)\[NoBreak] is not a valid value for an attribute in an \
XMLElement. The value of the attribute must be a string. \
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:ref/XMLElement\\\", ButtonNote -> \
\\\"XMLElement::attrhs\\\"]\\)\"\>"}]], "Message", "MSG",
 GeneratedCell->False,
 CellAutoOverwrite->False,
 CellChangeTimes->{
  3.575773036769436*^9, 3.575773139445051*^9, 3.575773170489106*^9, 
   3.5757732449016576`*^9, 3.575773377604718*^9, 3.5757734366594343`*^9, {
   3.575773605788634*^9, 3.575773630650689*^9}, 3.575773963684351*^9, 
   3.575774148259198*^9, 3.5757741839447327`*^9, {3.575774256964072*^9, 
   3.5757742709503098`*^9}, 3.575774303004379*^9, 3.5757743830685434`*^9, 
   3.575774457299134*^9, 3.575774531727563*^9, 3.575774595088379*^9, 
   3.5757746355182657`*^9, 3.5757747238772607`*^9, 3.575779425098704*^9, 
   3.5757859676247234`*^9, 3.575786453579839*^9, 3.575786853082011*^9, 
   3.5758175867818193`*^9, 3.578816691992367*^9, 3.581406009825386*^9, 
   3.581406160646013*^9, 3.5814062938836336`*^9, 3.603191026509364*^9, 
   3.6058566001169586`*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Export", "::", "autofix"}], "MessageName"], ":", 
  " ", "\<\"Malformed symbolic XML expression encountered. This may result in \
unexpected XML data. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/Export\\\", ButtonNote -> \\\"Export::autofix\\\"]\
\\)\"\>"}]], "Message", "MSG",
 GeneratedCell->False,
 CellAutoOverwrite->False,
 CellChangeTimes->{
  3.575773036769436*^9, 3.575773139445051*^9, 3.575773170489106*^9, 
   3.5757732449016576`*^9, 3.575773377604718*^9, 3.5757734366594343`*^9, {
   3.575773605788634*^9, 3.575773630650689*^9}, 3.575773963684351*^9, 
   3.575774148259198*^9, 3.5757741839447327`*^9, {3.575774256964072*^9, 
   3.5757742709503098`*^9}, 3.575774303004379*^9, 3.5757743830685434`*^9, 
   3.575774457299134*^9, 3.575774531727563*^9, 3.575774595088379*^9, 
   3.5757746355182657`*^9, 3.5757747238772607`*^9, 3.575779425098704*^9, 
   3.5757859676247234`*^9, 3.575786453579839*^9, 3.575786853082011*^9, 
   3.5758175867818193`*^9, 3.578816691992367*^9, 3.581406009825386*^9, 
   3.581406160646013*^9, 3.5814062938836336`*^9, 3.603191026509364*^9, 
   3.605856600117959*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"XMLElement", "::", "attrhs"}], "MessageName"], ":", 
  " ", "\<\"\[NoBreak]\\!\\(0.5`\\)\[NoBreak] in \[NoBreak]\\!\\(\\\"y\\\" \
\[Rule] 0.5`\\)\[NoBreak] is not a valid value for an attribute in an \
XMLElement. The value of the attribute must be a string. \
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:ref/XMLElement\\\", ButtonNote -> \
\\\"XMLElement::attrhs\\\"]\\)\"\>"}]], "Message", "MSG",
 GeneratedCell->False,
 CellAutoOverwrite->False,
 CellChangeTimes->{
  3.575773036769436*^9, 3.575773139445051*^9, 3.575773170489106*^9, 
   3.5757732449016576`*^9, 3.575773377604718*^9, 3.5757734366594343`*^9, {
   3.575773605788634*^9, 3.575773630650689*^9}, 3.575773963684351*^9, 
   3.575774148259198*^9, 3.5757741839447327`*^9, {3.575774256964072*^9, 
   3.5757742709503098`*^9}, 3.575774303004379*^9, 3.5757743830685434`*^9, 
   3.575774457299134*^9, 3.575774531727563*^9, 3.575774595088379*^9, 
   3.5757746355182657`*^9, 3.5757747238772607`*^9, 3.575779425098704*^9, 
   3.5757859676247234`*^9, 3.575786453579839*^9, 3.575786853082011*^9, 
   3.5758175867818193`*^9, 3.578816691992367*^9, 3.581406009825386*^9, 
   3.581406160646013*^9, 3.5814062938836336`*^9, 3.603191026509364*^9, 
   3.605856600117959*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Export", "::", "autofix"}], "MessageName"], ":", 
  " ", "\<\"Malformed symbolic XML expression encountered. This may result in \
unexpected XML data. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/Export\\\", ButtonNote -> \\\"Export::autofix\\\"]\
\\)\"\>"}]], "Message", "MSG",
 GeneratedCell->False,
 CellAutoOverwrite->False,
 CellChangeTimes->{
  3.575773036769436*^9, 3.575773139445051*^9, 3.575773170489106*^9, 
   3.5757732449016576`*^9, 3.575773377604718*^9, 3.5757734366594343`*^9, {
   3.575773605788634*^9, 3.575773630650689*^9}, 3.575773963684351*^9, 
   3.575774148259198*^9, 3.5757741839447327`*^9, {3.575774256964072*^9, 
   3.5757742709503098`*^9}, 3.575774303004379*^9, 3.5757743830685434`*^9, 
   3.575774457299134*^9, 3.575774531727563*^9, 3.575774595088379*^9, 
   3.5757746355182657`*^9, 3.5757747238772607`*^9, 3.575779425098704*^9, 
   3.5757859676247234`*^9, 3.575786453579839*^9, 3.575786853082011*^9, 
   3.5758175867818193`*^9, 3.578816691992367*^9, 3.581406009825386*^9, 
   3.581406160646013*^9, 3.5814062938836336`*^9, 3.603191026509364*^9, 
   3.605856600117959*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], ":", 
  " ", "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Export :: \
autofix\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \
calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \
\\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG",
 GeneratedCell->False,
 CellAutoOverwrite->False,
 CellChangeTimes->{
  3.575773036769436*^9, 3.575773139445051*^9, 3.575773170489106*^9, 
   3.5757732449016576`*^9, 3.575773377604718*^9, 3.5757734366594343`*^9, {
   3.575773605788634*^9, 3.575773630650689*^9}, 3.575773963684351*^9, 
   3.575774148259198*^9, 3.5757741839447327`*^9, {3.575774256964072*^9, 
   3.5757742709503098`*^9}, 3.575774303004379*^9, 3.5757743830685434`*^9, 
   3.575774457299134*^9, 3.575774531727563*^9, 3.575774595088379*^9, 
   3.5757746355182657`*^9, 3.5757747238772607`*^9, 3.575779425098704*^9, 
   3.5757859676247234`*^9, 3.575786453579839*^9, 3.575786853082011*^9, 
   3.5758175867818193`*^9, 3.578816691992367*^9, 3.581406009825386*^9, 
   3.581406160646013*^9, 3.5814062938836336`*^9, 3.603191026509364*^9, 
   3.6058566001189585`*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"XMLElement", "::", "attrhs"}], "MessageName"], ":", 
  " ", "\<\"\[NoBreak]\\!\\(0.75`\\)\[NoBreak] in \[NoBreak]\\!\\(\\\"y\\\" \
\[Rule] 0.75`\\)\[NoBreak] is not a valid value for an attribute in an \
XMLElement. The value of the attribute must be a string. \
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:ref/XMLElement\\\", ButtonNote -> \
\\\"XMLElement::attrhs\\\"]\\)\"\>"}]], "Message", "MSG",
 GeneratedCell->False,
 CellAutoOverwrite->False,
 CellChangeTimes->{
  3.575773036769436*^9, 3.575773139445051*^9, 3.575773170489106*^9, 
   3.5757732449016576`*^9, 3.575773377604718*^9, 3.5757734366594343`*^9, {
   3.575773605788634*^9, 3.575773630650689*^9}, 3.575773963684351*^9, 
   3.575774148259198*^9, 3.5757741839447327`*^9, {3.575774256964072*^9, 
   3.5757742709503098`*^9}, 3.575774303004379*^9, 3.5757743830685434`*^9, 
   3.575774457299134*^9, 3.575774531727563*^9, 3.575774595088379*^9, 
   3.5757746355182657`*^9, 3.5757747238772607`*^9, 3.575779425098704*^9, 
   3.5757859676247234`*^9, 3.575786453579839*^9, 3.575786853082011*^9, 
   3.5758175867818193`*^9, 3.578816691992367*^9, 3.581406009825386*^9, 
   3.581406160646013*^9, 3.5814062938836336`*^9, 3.603191026509364*^9, 
   3.6058566001189585`*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], ":", 
  " ", "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(XMLElement :: \
attrhs\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \
calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \
\\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG",
 GeneratedCell->False,
 CellAutoOverwrite->False,
 CellChangeTimes->{
  3.575773036769436*^9, 3.575773139445051*^9, 3.575773170489106*^9, 
   3.5757732449016576`*^9, 3.575773377604718*^9, 3.5757734366594343`*^9, {
   3.575773605788634*^9, 3.575773630650689*^9}, 3.575773963684351*^9, 
   3.575774148259198*^9, 3.5757741839447327`*^9, {3.575774256964072*^9, 
   3.5757742709503098`*^9}, 3.575774303004379*^9, 3.5757743830685434`*^9, 
   3.575774457299134*^9, 3.575774531727563*^9, 3.575774595088379*^9, 
   3.5757746355182657`*^9, 3.5757747238772607`*^9, 3.575779425098704*^9, 
   3.5757859676247234`*^9, 3.575786453579839*^9, 3.575786853082011*^9, 
   3.5758175867818193`*^9, 3.578816691992367*^9, 3.581406009825386*^9, 
   3.581406160646013*^9, 3.5814062938836336`*^9, 3.6031910265143642`*^9, 
   3.605856600119959*^9}]
}, Open  ]]
}, Open  ]]
},
WindowSize->{707, 817},
WindowMargins->{{124, Automatic}, {47, Automatic}},
FrontEndVersion->"10.3 for Microsoft Windows (64-bit) (October 9, 2015)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[579, 22, 314, 9, 88, "Section",
 Evaluatable->False],
Cell[896, 33, 1957, 39, 212, "Input"],
Cell[2856, 74, 1055, 21, 112, "Input"],
Cell[3914, 97, 2742, 61, 232, "Input"],
Cell[6659, 160, 512, 11, 72, "Input"],
Cell[7174, 173, 1138, 26, 132, "Input"],
Cell[8315, 201, 1014, 25, 92, "Input"],
Cell[9332, 228, 777, 17, 31, "Input"],
Cell[10112, 247, 2097, 43, 118, "Input"],
Cell[12212, 292, 1000, 21, 112, "Input"],
Cell[13215, 315, 696, 13, 31, "Input"],
Cell[13914, 330, 199, 5, 52, "Input"],
Cell[14116, 337, 1094, 23, 152, "Input"],
Cell[CellGroupData[{
Cell[15235, 364, 63, 1, 31, "Input"],
Cell[15301, 367, 1300, 23, 21, "Message"],
Cell[16604, 392, 1298, 23, 21, "Message"],
Cell[17905, 417, 3116, 49, 192, "Message"],
Cell[21024, 468, 1226, 22, 21, "Message"],
Cell[22253, 492, 1341, 23, 39, "Message"],
Cell[23597, 517, 1222, 22, 21, "Message"],
Cell[24822, 541, 1337, 23, 39, "Message"],
Cell[26162, 566, 1222, 22, 21, "Message"],
Cell[27387, 590, 1298, 23, 21, "Message"],
Cell[28688, 615, 1341, 23, 39, "Message"],
Cell[30032, 640, 1301, 23, 21, "Message"]
}, Open  ]]
}, Open  ]]
}
]
*)

(* End of internal cache information *)
